Function: readstr

CALL:

readstr(fname, n, decomment)

DESCRIPTION:

Read character array from file.

INPUT:

fname any
string with name of file to read
n any
maximum number of lines to read
decomment any
if true do not return commented lines

OUTPUT:

str any
string with filecontents